home *** CD-ROM | disk | FTP | other *** search
/ Haight-Ashbury in the Sixties / Haight-Ashbury in the Sixties (1996)(Rockument)(Disc 1 of 2)[Mac-PC].iso / mac / MAIN / TUNEIN / TUNEIN01.DIR / 00314_Script_314 < prev    next >
Text File  |  1995-06-01  |  525b  |  18 lines
  1. on mouseDown
  2.   global thisTopic, thisLine, lastTopic
  3.   set thisLine = the mouseLine
  4.   if thisLine = -1 then
  5.     exit
  6.   end if
  7.   if line thisLine of field "selected Topics" = "" then
  8.     beep
  9.     exit
  10.   end if
  11.   set thisTopic = line thisLine of field "selected Topics"
  12.   set lastTopic = line thisLine of field "selected Topics"
  13.   hilite line thisLine of field "selected Topics"
  14.   puppetSound "add a movie"
  15.   updatestage
  16.   set the text of cast "selected topics list" = the text of cast (thisTopic&" list")
  17. end
  18.